From 6359efefb70d3192b6f0a7285a38fbfdf0d6ddbf Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Thu, 28 Feb 2008 22:55:37 +0000 Subject: [PATCH] (startup-echo-area-message): Check for about-emacs. --- lisp/startup.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/startup.el b/lisp/startup.el index 059ae8de075..3e988421d3d 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -1834,7 +1834,7 @@ Type \\[describe-distribution] for information on ")) (insert "\tBuying printed manuals from the FSF\n")) (defun startup-echo-area-message () - (if (eq (key-binding "\C-h\C-p") 'describe-project) + (if (eq (key-binding "\C-h\C-a") 'about-emacs) "For information about GNU Emacs and the GNU system, type C-h C-a." (substitute-command-keys "For information about GNU Emacs and the GNU system, type \ -- 2.30.2